package com.ponxu.mb.web.action.admin;

import java.io.File;
import java.io.IOException;
import java.util.Arrays;
import java.util.Date;
import java.util.HashMap;
import java.util.Iterator;
import java.util.List;
import java.util.Random;

import javax.servlet.ServletException;
import javax.servlet.http.HttpServletRequest;
import javax.servlet.http.HttpServletResponse;

import org.apache.commons.fileupload.FileItem;
import org.apache.commons.fileupload.FileItemFactory;
import org.apache.commons.fileupload.FileUploadException;
import org.apache.commons.fileupload.disk.DiskFileItemFactory;
import org.apache.commons.fileupload.servlet.ServletFileUpload;
import org.json.simple.JSONObject;

import com.ponxu.log.Log;
import com.ponxu.log.LogFactory;
import com.ponxu.mb.Global;
import com.ponxu.mb.web.action.MiniBlogAction;
import com.ponxu.utils.TimeUtils;
import com.ponxu.web.core.WebContext;

/**
 * 文件上传
 * 
 * @author xwz
 */
@SuppressWarnings({ "unchecked", "rawtypes", "unused" })
public class UploadAction extends MiniBlogAction {
	private static final Log LOG = LogFactory.getLog();

	public String execute(HttpServletRequest request,
			HttpServletResponse response) throws ServletException, IOException {
		final String UPLOAD_ROOT_DIR = Global.read("UPLOAD_ROOT_DIR");
		final String UPLOAD_ROOT_URL = Global.read("UPLOAD_ROOT_URL");

		WebContext context = new WebContext(request, response);
		String savePath = context.Request().getSession().getServletContext()
				.getRealPath(UPLOAD_ROOT_DIR);
		String saveUrl = UPLOAD_ROOT_URL + UPLOAD_ROOT_DIR;
		LOG.debug("savePath=%s", savePath);

		// 定义允许上传的文件扩展名
		HashMap<String, String> extMap = new HashMap<String, String>();
		extMap.put("image", Global.read("IMAGE_TYPES"));
		extMap.put("flash", Global.read("FLASH_TYPES"));
		extMap.put("media", Global.read("MEDIA_TYPES"));
		extMap.put("file", Global.read("FILE_TYPES"));

		// 最大文件大小
		long maxSize = 1000000;

		if (!ServletFileUpload.isMultipartContent(context.Request())) {
			context.write(getError("请选择文件。"));
			return null;
		}

		// 检查目录
		File uploadDir = new File(savePath);
		if (!uploadDir.isDirectory()) {
			context.write(getError("上传目录不存在。"));
			return null;
		}
		// 检查目录写权限
		if (!uploadDir.canWrite()) {
			context.write(getError("上传目录没有写权限。"));
			return null;
		}

		String dirName = context.getParameter("dir");
		if (dirName == null) {
			dirName = "image";
		}
		if (!extMap.containsKey(dirName)) {
			context.write(getError("目录名不正确。"));
			return null;
		}

		// 创建文件夹
		savePath += dirName + "/";
		saveUrl += dirName + "/";
		File saveDirFile = new File(savePath);
		if (!saveDirFile.exists()) {
			saveDirFile.mkdirs();
		}
		String ymd = TimeUtils.format("yyyyMMdd", new Date());
		savePath += ymd + "/";
		saveUrl += ymd + "/";
		File dirFile = new File(savePath);
		if (!dirFile.exists()) {
			dirFile.mkdirs();
		}

		FileItemFactory factory = new DiskFileItemFactory();
		ServletFileUpload upload = new ServletFileUpload(factory);
		upload.setHeaderEncoding("UTF-8");
		List items = null;
		try {
			items = upload.parseRequest(context.Request());
		} catch (FileUploadException e) {
			context.write(getError("上传失败。"));
			return null;
		}
		Iterator itr = items.iterator();
		while (itr.hasNext()) {
			FileItem item = (FileItem) itr.next();
			String fileName = item.getName();
			long fileSize = item.getSize();
			if (!item.isFormField()) {
				// 检查文件大小
				if (item.getSize() > maxSize) {
					context.write(getError("上传文件大小超过限制。"));
					return null;
				}
				// 检查扩展名
				String fileExt = fileName.substring(
						fileName.lastIndexOf(".") + 1).toLowerCase();
				if (!Arrays.<String> asList(extMap.get(dirName).split(","))
						.contains(fileExt)) {
					context.write(getError("上传文件扩展名是不允许的扩展名。\n只允许"
							+ extMap.get(dirName) + "格式。"));
					return null;
				}

				String newFileName = TimeUtils.format("yyyyMMddHHmmss",
						new Date())
						+ "_"
						+ new Random().nextInt(1000)
						+ "."
						+ fileExt;
				try {
					File uploadedFile = new File(savePath, newFileName);
					item.write(uploadedFile);
				} catch (Exception e) {
					context.write(getError("上传文件失败。"));
				}

				JSONObject obj = new JSONObject();
				obj.put("error", 0);
				obj.put("url", saveUrl + newFileName);
				context.write(obj.toJSONString());
			}
		}

		return null;
	}

	private String getError(String message) {
		JSONObject obj = new JSONObject();
		obj.put("error", 1);
		obj.put("message", message);
		return obj.toJSONString();
	}
}